home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
program
/
swagd_f.zip
/
EGAVGA.SWG
/
0057_VGA Wait for retrace.pas
< prev
next >
Wrap
Pascal/Delphi Source File
|
1993-08-27
|
439b
|
16 lines
{
> Does anybody know how to wait for the retrace before drawing a new
> screen to eliminate flicker?
Here's the procedure from a PD unit called SuperVGA (by Steve Madsen):
Waits for a verticle retrace to complete before exiting. Useful
for reducing flicker in video intensive operations, like color cycling.
}
PROCEDURE WaitRetrace;
begin
while ((Port[$3DA] AND 8) > 0) do;
while ((Port[$3DA] AND 8) = 0) do;
end;